home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Memphis Amiga Group / MAG DOS 2.0 Utilities Disk 01 (1991-09)(Memphis Amiga Group).zip / MAG DOS 2.0 Utilities Disk 01 (1991-09)(Memphis Amiga Group).adf / KickReboot / KickBoot.a next >
Text File  |  1990-07-16  |  575b  |  31 lines
  1. ; Assembler Stub for KickReboot
  2.  
  3.     csect    text,CODE
  4.  
  5.     include    "exec/ables.i"
  6.     include "exec/funcdef.i"
  7.     include "exec/exec_lib.i"
  8.     include "asmsupp.i"
  9.     xdef _KickReboot
  10.  
  11.     int_ables
  12.  
  13. _KickReboot:
  14.     move.l    4,a6
  15.     lea    1$,a5
  16.     CALLSYS    Supervisor
  17. 1$:
  18.     Disable    a0        ;switch off multitasking
  19.     move.l    #0,-(sp)
  20.     move.l    sp,a0
  21.     pmove    (a0),tc        ;switch off mmu
  22.     move.l    #$1000004,a0    ;
  23.     move.l    $ffffec,a1    ;get KickStart length
  24.     suba.l    a1,a0        ;points to restart address
  25.     move.l    (a0),a0        ;get real address
  26.     cnop    0,4        ;longword align (IMPORTANT!)
  27.     reset
  28.     jmp    (a0)
  29.     ;Point of never never return
  30.     end
  31.